(outline-minor-mode): Force update of modeline when outline-minor-mode

is toggled.

diff --git a/lisp/textmodes/ooutline.el b/lisp/textmodes/ooutline.el
index 4b7607dd5ccf8f16d633f7db46303de9640f6c97..2111c76ccd18a28d0436480c106c92febf1571bc 100644 (file)
--- a/lisp/textmodes/ooutline.el
+++ b/lisp/textmodes/ooutline.el
@@ -194,7 +194,8 @@ See the command `outline-mode' for more information on this mode."
       (progn
        (setq selective-display t)
        (run-hooks 'outline-minor-mode-hook))
-    (setq selective-display nil)))
+    (setq selective-display nil))
+  (set-buffer-modified-p (buffer-modified-p)))
 \f
 (defvar outline-level 'outline-level
   "Function of no args to compute a header's nesting level in an outline.